﻿Public Class cDatabaseFactory


    Public Shared Function Create() As cDatabase
        If g_oDatabase Is Nothing Then
            g_oDatabase = New cDatabase()
        End If
        Return g_oDatabase
    End Function

End Class
